home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1988 January / Ahoy_Magazine_88-01_1988_Double_L.d64 / Ideal Input 64 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  419 b   |  14 lines
  1. 1 rem ==================================
  2. 2 rem    commodares problem #45-1 :
  3. 3 rem      ideal input
  4. 4 rem    solution by
  5. 5 rem      bill stech
  6. 6 rem ======  c-64 only  ===============
  7. 100 poke 1,55  :rem select rom basic
  8. 105 print"[147]this takes over 40 seconds..."
  9. 110 for t=40960 to 49151:poke t,peek(t):next
  10. 120 poke 44136,0:poke 44183,0:poke 43968,255:poke 44140,0:poke 44144,0
  11. 130 poke 1,54 :rem select ram basic
  12. 140 input u$ :rem can use commas now
  13. 150 print u$
  14.